home *** CD-ROM | disk | FTP | other *** search
/ Risc World 5 / Risc World 5.iso / SOFTWARE / Issue5 / PD / FLOWER / FLOWERBOX / !FlowerBox / !Run next >
Text File  |  2005-01-05  |  618b  |  19 lines
  1. | Ensure Tinct is loaded
  2. RMEnsure Tinct 0.09 IfThere System:Modules.Tinct Then RMLoad System:Modules.Tinct
  3. RMEnsure Tinct 0.09 Error FlowerBox requires Tinct 0.09 or later. This can be downloaded from http://www.tinct.net
  4.  
  5. | Set the resolution and memory requirements
  6. Run <Obey$Dir>.SetRes
  7. Set Alias$FlowerBox_Memory "WimpSlot -min <FlowerBox$Memory> -max <FlowerBox$Memory>"
  8.  
  9. | Run the screensaver
  10. Set ScrSaver$Running Yes
  11. Set BlankTask$Dir <Obey$Dir>
  12. FlowerBox_Memory
  13. Run <BlankTask$Dir>.<FlowerBox$Resolution> %*0
  14.  
  15. | Free our variables
  16. UnSet Alias$FlowerBox_Memory
  17. UnSet FlowerBox$Resolution
  18. UnSet FlowerBox$Memory
  19.